home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 12 / Mac Magazin and MacEasy Magazine CD - Issue 12.iso / Sharewarebibliothek / DFÜ / Joe's Pager™ (App) 1.55 / Joe's Pager™ (App) / Joe's Pager™ (App).rsrc / LENS_130_Editor < prev    next >
Text File  |  1995-01-20  |  3KB  |  97 lines
  1. ItemType: WIND
  2. Rect: 106,95,406,230
  3. Style: Dialog
  4. HasTitleBar: TRUE
  5. HasZoomBox: FALSE
  6. Name: Editor
  7. TextFont: Geneva
  8. TextSize: 9
  9. Script: --on windowEvent  wdID,wdName,objNo,objName,objValue¬¬if objValue="Open" then¬else if objValue="Close" then¬else if objValue="Suspend" then ¬  ¬else if objValue="Resume" then ¬  ¬else if objValue="CloseBox" then ¬  ¬else if objValue="ZoomBox" then ¬  ¬else if objValue="GrowBox" then ¬  ¬else if objValue="TitleBar" then ¬  ¬end if¬¬--end windowEvent¬¬
  10. Params: i5_Text¬i6_Text¬i7_Text¬i8_Text¬i9_Text¬i10_Text¬i11_Text¬i5_KeyFilter¬i6_KeyFilter¬i7_KeyFilter¬i8_KeyFilter
  11. Result: i5_Text¬i6_Text¬i7_Text¬i8_Text¬i9_Text
  12.  
  13. ItemType: PUSH
  14. Rect: 16,112,96,128
  15. Name: Save
  16. AutoClose: TRUE
  17. Balloon: Saves name you have entered to the Names List, and closes this window
  18. Script: EditorSave wdName
  19.  
  20. ItemType: PUSH
  21. Rect: 108,112,188,128
  22. Name: Remove
  23. AutoClose: TRUE
  24. Balloon: Removes name you have entered from the Names List, and closes this window
  25. Script: EditorRemove wdName
  26.  
  27. ItemType: PUSH
  28. Rect: 208,112,280,128
  29. Name: Cancel
  30. DefaultItem: TRUE
  31. CancelItem: TRUE
  32. AutoClose: TRUE
  33. Balloon: Closes this window
  34.  
  35. ItemType: LBL
  36. Rect: 16,9,73,21
  37. Text: First Name:
  38.  
  39. ItemType: TEXT
  40. Rect: 72,9,287,25
  41. Name: First Name
  42. LockText: FALSE
  43. TextStyle: Bold
  44. Script: if ":" is in objValue then¬  answer "Please remove all colons (“:”) from the name"¬  return true¬end if
  45.  
  46. ItemType: TEXT
  47. Rect: 72,33,287,49
  48. Name: Middle Name
  49. LockText: FALSE
  50. TextStyle: Bold
  51. Script: if ":" is in objValue then¬  answer "Please remove all colons (“:”) from the name"¬  return true¬end if
  52.  
  53. ItemType: TEXT
  54. Rect: 72,57,287,73
  55. Name: Last Name
  56. LockText: FALSE
  57. TextStyle: Bold
  58. Script: if ":" is in objValue then¬  answer "Please remove all colons (“:”) from the name"¬  return true¬end if
  59.  
  60. ItemType: TEXT
  61. Rect: 72,81,195,97
  62. Name: PINNo
  63. LockText: FALSE
  64. TextStyle: Bold
  65. Script: put line 8 of bg fld "Preferences" into numDigits¬if numDigits is not empty and numDigits is a number then¬  if length of objValue ≠ numDigits then¬    answer "PIN must be" && numDigits && "digits long."¬    return true¬  end if¬end if¬
  66.  
  67. ItemType: TEXT
  68. Rect: 199,81,294,97
  69. Visible: FALSE
  70. Name: JBidNo
  71. LockText: FALSE
  72. TextStyle: Bold
  73.  
  74. ItemType: TEXT
  75. Rect: 72,160,287,176
  76. Name: NameDataBank
  77. LockText: FALSE
  78. TextStyle: Bold
  79.  
  80. ItemType: TEXT
  81. Rect: 72,181,164,197
  82. Name: EditLineNo
  83. LockText: FALSE
  84. TextStyle: Bold
  85.  
  86. ItemType: LBL
  87. Rect: 36,34,73,46
  88. Text: Middle:
  89.  
  90. ItemType: LBL
  91. Rect: 19,57,73,69
  92. Text: Last Name:
  93.  
  94. ItemType: LBL
  95. Rect: 50,81,73,93
  96. Text: PIN:
  97. Balloon: PIN is the Pager ID Number—usually a 7 digit phone number which calls a specific pager. This may vary with the pager service.